home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / games / strategy / madgic-corewar-4.0.lzh / 1988 / dmdmule.s < prev    next >
Text File  |  1989-10-04  |  20KB  |  1,126 lines
  1. ;  NOTE:  This is the complete version of Mule DNA, one of the '88
  2. ;    finalists.
  3.      DAT 1588  ;This is Mule%dna, the entry of Douglas McDaniels.
  4.      DAT 1337  
  5.      DAT 123   
  6.       SPL 0     
  7. START SPL 17         
  8.      CMP <-5,    <-4  
  9.      MOV -3,     @-6  
  10.      CMP <-7,    <-6  
  11.      MOV -5,     @-7  
  12.      DJN -4,     -7   
  13.      MOV #1589,  -10  
  14.       MOV #168,   -9   
  15.      MOV -12,    <-12 ;This entry may need particular care when typed in,
  16.      MOV -13,    <-13 ;since it is a complicated program.
  17.      MOV -14,    <-14
  18.      DJN -3,     -13
  19.      JMP -6
  20.      DAT 1674
  21.      DAT 1423
  22.      DAT 123
  23.      SPL 0
  24.      SPL 17
  25.      CMP <-5,    <-4
  26.      MOV -3,     @-6
  27.      CMP <-7,    <-6
  28.      MOV -5,     @-7
  29.      DJN -4,     -7
  30.      MOV #1675,  -10
  31.      MOV #168,   -9
  32.      MOV -12,    <-12
  33.      MOV -13,    <-13
  34.      MOV -14,    <-14
  35.      DJN -3,     -13
  36.      JMP -6
  37.      DAT 1760
  38.      DAT 1509
  39.      DAT 123
  40.      SPL 0
  41.      SPL 17
  42.      CMP <-5,    <-4
  43.      MOV -3,     @-6
  44.      CMP <-7,    <-6
  45.      MOV -5,     @-7
  46.      DJN -4,     -7
  47.      MOV #1761,  -10
  48.      MOV #168,   -9
  49.      MOV -12,    <-12
  50.      MOV -13,    <-13
  51.      MOV -14,    <-14
  52.      DJN -3,     -13
  53.      JMP -6
  54.      DAT 1846
  55.       DAT 1595
  56.      DAT 123
  57.      SPL 0
  58.      SPL 17
  59.      CMP <-5,    <-4
  60.      MOV -3,     @-6
  61.      CMP <-7,    <-6
  62.      MOV -5,     @-7
  63.      DJN -4,     -7
  64.      MOV #1847,  -10
  65.      MOV #168,   -9
  66.      MOV -12,    <-12
  67.      MOV -13,    <-13
  68.      MOV -14,    <-14
  69.      DJN -3,     -13
  70.      JMP -6
  71.      DAT 1932
  72.      DAT 1681
  73.      DAT 123
  74.      SPL 0
  75.      SPL 17
  76.      CMP <-5,    <-4
  77.      MOV -3,     @-6
  78.      CMP <-7,    <-6
  79.      MOV -5,     @-7
  80.      DJN -4,     -7
  81.      MOV #1933,  -10
  82.      MOV #168,   -9
  83.      MOV -12,    <-12
  84.      MOV -13,    <-13
  85.      MOV -14,    <-14
  86.      DJN -3,     -13
  87.      JMP -6
  88.      DAT 2018
  89.      DAT 1767
  90.      DAT 123
  91.      SPL 0
  92.      SPL 17
  93.      CMP <-5,    <-4
  94.      MOV -3,     @-6
  95.      CMP <-7,    <-6
  96.      MOV -5,     @-7
  97.      DJN -4,     -7
  98.      MOV #2019,  -10
  99.      MOV #168,   -9
  100.      MOV -12,    <-12
  101.      MOV -13,    <-13
  102.      MOV -14,    <-14
  103.      DJN -3,     -13
  104.      JMP -6
  105.      DAT 2104
  106.      DAT 1853
  107.      DAT 123
  108.      SPL 0
  109.      SPL 17
  110.      CMP <-5,    <-4
  111.      MOV -3,     @-6
  112.      CMP <-7,    <-6
  113.      MOV -5,     @-7
  114.      DJN -4,     -7
  115.      MOV #2105,  -10
  116.      MOV #168,   -9
  117.      MOV -12,    <-12
  118.      MOV -13,    <-13
  119.      MOV -14,    <-14
  120.      DJN -3,     -13
  121.      JMP -6
  122.      DAT 2190
  123.      DAT 1939
  124.      DAT 123
  125.      SPL 0
  126.      SPL 17
  127.      CMP <-5,    <-4
  128.      MOV -3,     @-6
  129.      CMP <-7,    <-6
  130.      MOV -5,     @-7
  131.      DJN -4,     -7
  132.      MOV #2191,  -10
  133.      MOV #168,   -9
  134.      MOV -12,    <-12
  135.      MOV -13,    <-13
  136.      MOV -14,    <-14
  137.      DJN -3,     -13
  138.      JMP -6
  139.      DAT 2276
  140.      DAT 2025
  141.      DAT 123
  142.      SPL 0
  143.      SPL 17
  144.      CMP <-5,    <-4
  145.      MOV -3,     @-6
  146.      CMP <-7,    <-6
  147.      MOV -5,     @-7
  148.      DJN -4,     -7
  149.      MOV #2277,  -10
  150.      MOV #168,   -9
  151.      MOV -12,    <-12
  152.      MOV -13,    <-13
  153.      MOV -14,    <-14
  154.      DJN -3,     -13
  155.      JMP -6
  156.      DAT 2362
  157.      DAT 2111
  158.      DAT 123
  159.      SPL 0
  160.      SPL 17
  161.      CMP <-5,    <-4
  162.      MOV -3,     @-6
  163.      CMP <-7,    <-6
  164.      MOV -5,     @-7
  165.      DJN -4,     -7
  166.      MOV #2363,  -10
  167.      MOV #168,   -9
  168.      MOV -12,    <-12
  169.      MOV -13,    <-13
  170.      MOV -14,    <-14
  171.      DJN -3,     -13
  172.      JMP -6
  173.      DAT 2448
  174.      DAT 2197
  175.      DAT 123
  176.      SPL 0
  177.      SPL 17
  178.      CMP <-5,    <-4
  179.      MOV -3,     @-6
  180.      CMP <-7,    <-6
  181.      MOV -5,     @-7
  182.      DJN -4,     -7
  183.      MOV #2449,  -10
  184.      MOV #168,   -9
  185.      MOV -12,    <-12
  186.      MOV -13,    <-13
  187.      MOV -14,    <-14
  188.      DJN -3,     -13
  189.      JMP -6,
  190.      DAT 2534
  191.      DAT 2283
  192.      DAT 123
  193.      SPL 0
  194.      SPL 17
  195.      CMP <-5,    <-4
  196.      MOV -3,     @-6
  197.      CMP <-7,    <-6
  198.      MOV -5,     @-7
  199.      DJN -4,     -7
  200.      MOV #2535,  -10
  201.      MOV #168,   -9
  202.      MOV -12,    <-12
  203.      MOV -13,    <-13
  204.      MOV -14,    <-14
  205.      DJN -3,     -13
  206.      JMP -6
  207.      DAT 2620
  208.      DAT 2369
  209.      DAT 123
  210.      SPL 0
  211.      SPL 17
  212.      CMP <-5,    <-4
  213.      MOV -3,     @-6
  214.      CMP <-7,    <-6
  215.      MOV -5,     @-7
  216.      DJN -4,     -7
  217.      MOV #2621,  -10
  218.      MOV #168,   -9
  219.      MOV -12,    <-12
  220.      MOV -13,    <-13
  221.      MOV -14,    <-14
  222.      DJN -3,     -13
  223.      JMP -6
  224.      DAT 2706
  225.      DAT 2455
  226.      DAT 123
  227.      SPL 0
  228.      SPL 17
  229.      CMP <-5,    <-4
  230.      MOV -3,     @-6
  231.      CMP <-7,    <-6
  232.      MOV -5,     @-7
  233.      DJN -4,     -7
  234.      MOV #2707,  -10
  235.      MOV #168,   -9
  236.      MOV -12,    <-12
  237.      MOV -13,    <-13
  238.      MOV -14,    <-14
  239.      DJN -3,     -13
  240.      JMP -6
  241.      DAT 2792
  242.      DAT 2541
  243.      DAT 123
  244.      SPL 0
  245.      SPL 17
  246.      CMP <-5,    <-4
  247.      MOV -3,     @-6
  248.      CMP <-7,    <-6
  249.      MOV -5,     @-7
  250.      DJN -4,     -7
  251.      MOV #2793,  -10
  252.      MOV #168,   -9
  253.      MOV -12,    <-12
  254.      MOV -13,    <-13
  255.      MOV -14,    <-14
  256.      DJN -3,     -13
  257.      JMP -6
  258.      DAT 2878
  259.      DAT 2627
  260.      DAT 123
  261.      SPL 0
  262.      SPL 17
  263.      CMP <-5,    <-4
  264.      MOV -3,     @-6
  265.      CMP <-7,    <-6
  266.      MOV -5,     @-7
  267.      DJN -4,     -7
  268.      MOV #2879,  -10
  269.      MOV #168,   -9
  270.      MOV -12,    <-12
  271.      MOV -13,    <-13
  272.      MOV -14,    <-14
  273.      DJN -3,     -13
  274.      JMP -6,
  275.      DAT 2964
  276.      DAT 2713
  277.      DAT 123
  278.      SPL 0
  279.      SPL 17
  280.      CMP <-5,    <-4
  281.      MOV -3,     @-6
  282.      CMP <-7,    <-6
  283.      MOV -5,     @-7
  284.      DJN -4,     -7
  285.      MOV #2965,  -10
  286.      MOV #168,   -9
  287.      MOV -12,    <-12
  288.      MOV -13,    <-13
  289.      MOV -14,    <-14
  290.      DJN -3,     -13
  291.      JMP -6
  292.      DAT 3050
  293.      DAT 2799
  294.      DAT 123
  295.      SPL 0
  296.      SPL 17
  297.      CMP <-5,    <-4
  298.      MOV -3,     @-6
  299.      CMP <-7,    <-6
  300.      MOV -5,     @-7
  301.      DJN -4,     -7
  302.      MOV #3051,  -10
  303.      MOV #168,   -9
  304.      MOV -12,    <-12
  305.      MOV -13,    <-13
  306.      MOV -14,    <-14
  307.      DJN -3,     -13
  308.      JMP -6
  309.      DAT 3136
  310.      DAT 2885
  311.      DAT 123
  312.      SPL 0
  313.      SPL 17
  314.      CMP <-5,    <-4
  315.      MOV -3,     @-6
  316.      CMP <-7,    <-6
  317.      MOV -5,     @-7
  318.      DJN -4,     -7
  319.      MOV #3137,  -10
  320.      MOV #168,   -9
  321.      MOV -12,    <-12
  322.      MOV -13,    <-13
  323.      MOV -14,    <-14
  324.      DJN -3,     -13
  325.      JMP -6
  326.      DAT 3222
  327.      DAT 2971
  328.      DAT 123
  329.      SPL 0
  330.      SPL 17
  331.      CMP <-5,    <-4
  332.      MOV -3,     @-6
  333.      CMP <-7,    <-6
  334.      MOV -5,     @-7
  335.      DJN -4,     -7
  336.      MOV #3223,  -10
  337.      MOV #168,   -9
  338.      MOV -12,    <-12
  339.      MOV -13,    <-13
  340.      MOV -14,    <-14
  341.      DJN -3,     -13
  342.      JMP -6
  343.      DAT 3308
  344.      DAT 3057
  345.      DAT 123
  346.      SPL 0
  347.      SPL 17
  348.      CMP <-5,    <-4
  349.      MOV -3,     @-6
  350.      CMP <-7,    <-6
  351.      MOV -5,     @-7
  352.      DJN -4,     -7
  353.      MOV #3309,  -10
  354.      MOV #168,   -9
  355.      MOV -12,    <-12
  356.      MOV -13,    <-13
  357.      MOV -14,    <-14
  358.      DJN -3,     -13
  359.      JMP -6
  360.      DAT 3394
  361.      DAT 3143
  362.      DAT 123
  363.      SPL 0
  364.      SPL 17
  365.      CMP <-5,    <-4
  366.      MOV -3,     @-6
  367.      CMP <-7,    <-6
  368.      MOV -5,     @-7
  369.      DJN -4,     -7
  370.      MOV #3395,  -10
  371.      MOV #168,   -9
  372.      MOV -12,    <-12
  373.      MOV -13,    <-13
  374.      MOV -14,    <-14
  375.      DJN -3,     -13
  376.      JMP -6
  377.      DAT 3480
  378.      DAT 3229
  379.      DAT 123
  380.      SPL 0
  381.      SPL 17
  382.      CMP <-5,    <-4
  383.      MOV -3,     @-6
  384.      CMP <-7,    <-6
  385.      MOV -5,     @-7
  386.      DJN -4,     -7
  387.      MOV #3481,  -10
  388.      MOV #168,   -9
  389.      MOV -12,    <-12
  390.      MOV -13,    <-13
  391.      MOV -14,    <-14
  392.      DJN -3,     -13
  393.      JMP -6
  394.      DAT 3566
  395.      DAT 3315
  396.      DAT 123
  397.      SPL 0
  398.      SPL 17
  399.      CMP <-5,    <-4
  400.      MOV -3,     @-6
  401.      CMP <-7,    <-6
  402.      MOV -5,     @-7
  403.      DJN -4,     -7
  404.      MOV #3567,  -10
  405.      MOV #168,   -9
  406.      MOV -12,    <-12
  407.      MOV -13,    <-13
  408.      MOV -14,    <-14
  409.      DJN -3,     -13
  410.      JMP -6
  411.      DAT 3652
  412.      DAT 3401
  413.      DAT 123
  414.      SPL 0
  415.      SPL 17
  416.      CMP <-5,    <-4
  417.      MOV -3,     @-6
  418.      CMP <-7,    <-6
  419. ; 
  420.      MOV -5,     @-7
  421.      DJN -4,     -7
  422.      MOV #3653,  -10
  423.      MOV #168,   -9
  424.      MOV -12,    <-12
  425.      MOV -13,    <-13
  426.      MOV -14,    <-14
  427.      DJN -3,     -13
  428.      JMP -6
  429.      DAT 3738
  430.      DAT 3487
  431.      DAT 123
  432.      SPL 0
  433.      SPL 17
  434.      CMP <-5,    <-4
  435.      MOV -3,     @-6
  436.      CMP <-7,    <-6
  437.      MOV -5,     @-7
  438.      DJN -4,     -7
  439.      MOV #3739,  -10
  440.      MOV #168,   -9
  441. ; 
  442.      MOV -12,    <-12
  443.      MOV -13,    <-13
  444.      MOV -14,    <-14
  445.      DJN -3,     -13
  446.      JMP -6
  447.      DAT 3824
  448.      DAT 3573
  449.      DAT 123
  450.      SPL 0
  451.      SPL 17
  452.      CMP <-5,    <-4
  453.      MOV -3,     @-6
  454.      CMP <-7,    <-6
  455.      MOV -5,     @-7
  456. ; 
  457.      DJN -4,     -7
  458.      MOV #3825,  -10
  459.      MOV #168,   -9
  460.      MOV -12,    <-12
  461.      MOV -13,    <-13
  462.      MOV -14,    <-14
  463.      DJN -3,     -13
  464. ; 
  465.      JMP -6
  466.      DAT 3910
  467.      DAT 3659
  468.      DAT 123
  469.      SPL 0
  470.      SPL 17
  471.      CMP <-5,    <-4
  472.      MOV -3,     @-6
  473.      CMP <-7,    <-6
  474.      MOV -5,    @-7
  475. ; 
  476.      DJN -4,     -7
  477.      MOV #3911,  -10
  478.      MOV #168,   -9
  479.      MOV -12,    <-12
  480.      MOV -13,    <-13
  481.      MOV -14,    <-14
  482.      DJN -3,     -13
  483.      JMP -6
  484. ; 
  485.      DAT 3996
  486.      DAT 3745
  487.      DAT 123
  488.      SPL 0
  489.      SPL 17
  490.      CMP <-5,    <-4
  491.      MOV -3,     @-6
  492.      CMP <-7,    <-6
  493. ; 
  494.      MOV -5,     @-7
  495.      DJN -4,     -7
  496.      MOV #3997,  -10
  497.      MOV #168,   -9
  498.      MOV -12,    <-12
  499.      MOV -13,    <-13
  500.      MOV -14,    <-14
  501. ; 
  502.      DJN -3,     -13
  503.      JMP -6
  504.      DAT 4082
  505.      DAT 3831
  506.      DAT 123
  507.      SPL 0
  508.      SPL 17
  509.      CMP <-5,    <-4
  510.      MOV -3,     @-6
  511.      CMP <-7,    <-6
  512.      MOV -5,     @-7
  513.      DJN -4,     -7
  514.      MOV #4083,  -10
  515.      MOV #168,   -9
  516.      MOV -12,    <-12
  517.      MOV -13,    <-13
  518.      MOV -14,    <-14
  519.      DJN -3,     -13
  520.      JMP -6
  521.      DAT 4168
  522.      DAT 3917
  523.      DAT 123
  524.      SPL 0
  525.      SPL 17
  526.      CMP <-5,    <-4
  527.      MOV -3,     @-6
  528.      CMP <-7,    <-6
  529.      MOV -5,     @-7
  530.      DJN -4,     -7
  531. ; 
  532.      MOV #4169,  -10
  533.      MOV #168,   -9
  534.      MOV -12,    <-12
  535.      MOV -13,    <-13
  536.      MOV -14,    <-14
  537.      DJN -3,     -13
  538.      JMP -6
  539.      DAT 4254
  540.      DAT 4003
  541.      DAT 123
  542. ; 
  543.      SPL 0
  544.      SPL 17
  545.      CMP <-5,    <-4
  546.      MOV -3  ,   @-6
  547.      CMP <-7  ,  <-6
  548.      MOV -5    , @-7
  549.      DJN -4     ,-7
  550.      MOV #4255,  -10
  551.      MOV #168  , -9
  552.      MOV -12    ,<-12
  553.      MOV -13,    <-13
  554.      MOV -14 ,   <-14
  555.      DJN -3   ,  -13
  556.      JMP -6
  557.      DAT 4340
  558.      DAT 4089
  559.      DAT 123
  560.      SPL 0
  561.      SPL 17
  562.      CMP <-5,    <-4
  563.      MOV -3  ,   @-6
  564.      CMP <-7  ,  <-6
  565.      MOV -5    , @-7
  566. ; 
  567.      DJN -4     ,-7
  568.      MOV #4341,  -10
  569.      MOV #168  , -9
  570.      MOV -12    ,<-12
  571.      MOV -13,    <-13
  572.      MOV -14 ,   <-14
  573.      DJN -3   ,  -13
  574.      JMP -6
  575.      DAT 4426
  576.      DAT 4175
  577.      DAT 123
  578.      SPL 0
  579.      SPL 17
  580.      CMP <-5   , <-4
  581.      MOV -3     ,@-6
  582.      CMP <-7,    <-6
  583.      MOV -5  ,   @-7
  584.      DJN -4   ,  -7
  585.      MOV #4427 , -10
  586. ; 
  587.      MOV #168   ,-9
  588.      MOV -12,    <-12
  589.      MOV -13 ,   <-13
  590.      MOV -14  ,  <-14
  591.      DJN -3    , -13
  592.      JMP -6
  593.      DAT 4512
  594.      DAT 4261
  595.      DAT 123
  596.      SPL 0
  597.      SPL 17
  598.      CMP <-5    ,<-4
  599.      MOV -3,     @-6
  600.      CMP <-7,    <-6
  601.      MOV -5  ,   @-7
  602. ; 
  603.      DJN -4   ,  -7
  604.      MOV #4513 , -10
  605.      MOV #168   ,-9
  606.      MOV -12,    <-12
  607.      MOV -13 ,   <-13
  608.      MOV -14  ,  <-14
  609.      DJN -3    , -13
  610.      JMP -6
  611.      DAT 4598
  612.      DAT 4347
  613.      DAT 123
  614.      SPL 0
  615.      SPL 17
  616.      CMP <-5    ,<-4
  617.      MOV -3,     @-6
  618.      CMP <-7,    <-6
  619.      MOV -5  ,   @-7
  620.      DJN -4   ,  -7
  621.      MOV #4599 , -10
  622.      MOV #168   ,-9
  623.      MOV -12,    <-12
  624.      MOV -13 ,   <-13
  625.      MOV -14  ,  <-14
  626.      DJN -3    , -13
  627.      JMP -6
  628.      DAT 4684
  629.      DAT 4433
  630.      DAT 123
  631.      SPL 0
  632.      SPL 17
  633.      CMP <-5    ,<-4
  634.      MOV -3,     @-6
  635.      CMP <-7,    <-6
  636.      MOV -5  ,   @-7
  637.      DJN -4   ,  -7
  638.      MOV #4685 , -10
  639.      MOV #168   ,-9
  640. ; 
  641.      MOV -12,    <-12
  642.      MOV -13 ,   <-13
  643.      MOV -14  ,  <-14
  644.      DJN -3    , -13
  645.      JMP -6
  646.      DAT 4770
  647.      DAT 4519
  648.      DAT 123
  649.      SPL 0
  650.      SPL 17
  651.      CMP <-5    ,<-4
  652.      MOV -3,     @-6
  653.      CMP <-7,    <-6
  654.      MOV -5  ,   @-7
  655.      DJN -4   ,  -7
  656.      MOV #4771 , -10
  657.      MOV #168   ,-9
  658.      MOV -12,    <-12
  659.      MOV -13 ,   <-13
  660.      MOV -14  ,  <-14
  661.      DJN -3    , -13
  662.      JMP -6
  663.      DAT 4856
  664.      DAT 4605
  665.      DAT 123
  666.      SPL 0
  667.      SPL 17
  668.      CMP <-5,    <-4
  669.      MOV -3  ,   @-6
  670.      CMP <-7  ,  <-6
  671.      MOV -5    , @-7
  672.      DJN -4     ,-7
  673.      MOV #4857,  -10
  674.      MOV #168  , -9
  675.      MOV -12    ,<-12
  676.      MOV -13,    <-13
  677.      MOV -14 ,   <-14
  678.      DJN -3   ,  -13
  679.      JMP -6
  680.      DAT 4942
  681.      DAT 4691
  682.      DAT 123
  683.      SPL 0
  684. ; 
  685.      SPL 17
  686.      CMP <-5,    <-4
  687.      MOV -3  ,   @-6
  688.      CMP <-7  ,  <-6
  689.      MOV -5    , @-7
  690.      DJN -4     ,-7
  691.      MOV #4943,  -10
  692.      MOV #168  , -9
  693.      MOV -12    ,<-12
  694. ; 
  695.      MOV -13,    <-13
  696.      MOV -14 ,   <-14
  697.      DJN -3   ,  -13
  698.      JMP -6
  699.      DAT 5028
  700. ; 
  701.      DAT 4777
  702.      DAT 123
  703.      SPL 0
  704.      SPL 17
  705.      CMP <-5   , <-4
  706.      MOV -3     ,@-6
  707.      CMP <-7,    <-6
  708.      MOV -5  ,   @-7
  709.      DJN -4   ,  -7
  710.      MOV #5029 , -10
  711.      MOV #168   ,-9
  712.      MOV -12,    <-12
  713.      MOV -13 ,   <-13
  714.      MOV -14  ,  <-14
  715.      DJN -3    , -13
  716.      JMP -6
  717.      DAT 5114
  718.      DAT 4863
  719.      DAT 123
  720.      SPL 0
  721. ; 
  722.      SPL 17
  723.      CMP <-5    ,<-4
  724.      MOV -3,     @-6
  725.      CMP <-7,    <-6
  726.      MOV -5  ,   @-7
  727.      DJN -4   ,  -7
  728.      MOV #5115 , -10
  729.      MOV #168   ,-9
  730.      MOV -12,    <-12
  731.      MOV -13 ,   <-13
  732.      MOV -14  ,  <-14
  733.      DJN -3    , -13
  734. ;
  735.      JMP -6
  736.      DAT 5200
  737.      DAT 4949
  738.      DAT 123
  739.      SPL 0
  740.      SPL 17
  741.      CMP <-5,    <-4
  742.      MOV -3  ,   @-6
  743.      CMP <-7  ,  <-6
  744.      MOV -5    , @-7
  745.      DJN -4     ,-7
  746.      MOV #5201,  -10
  747. ; 
  748.      MOV #168  , -9
  749.      MOV -12    ,<-12
  750.      MOV -13,    <-13
  751. ;
  752.      MOV -14,    <-14
  753.      DJN -3  ,   -13
  754.      JMP -6
  755.      DAT 5286
  756.      DAT 5035
  757.      DAT 123
  758.      SPL 0
  759.      SPL 17
  760.      CMP <-5 ,   <-4
  761.      MOV -3   ,  @-6
  762.      CMP <-7   , <-6
  763.      MOV -5     ,@-7
  764.      DJN -4,     -7
  765.      MOV #5287,  -10
  766.      MOV #168  , -9
  767.      MOV -12,    <-12
  768.      MOV -13 ,   <-13
  769.      MOV -14  ,  <-14
  770. ; 
  771.      DJN -3   ,  -13
  772.      JMP -6
  773.      DAT 5372
  774.      DAT 5121
  775.      DAT 123
  776.      SPL 0
  777.      SPL 17
  778.      CMP <-5   , <-4
  779.      MOV -3     ,@-6
  780.      CMP <-7,    <-6
  781.      MOV -5  ,   @-7
  782.      DJN -4   ,  -7
  783.      MOV #5373 , -10
  784.      MOV #168   ,-9
  785.      MOV -12,    <-12
  786.      MOV -13 ,   <-13
  787.      MOV -14  ,  <-14
  788.      DJN -3    , -13
  789.      JMP -6
  790.      DAT 5458
  791.      DAT 5207
  792.      DAT 123
  793.      SPL 0
  794.      SPL 17
  795.      CMP <-5    ,<-4
  796.      MOV -3,     @-6
  797.      CMP <-7,    <-6
  798.      MOV -5  ,   @-7
  799.      DJN -4   ,  -7
  800.      MOV #5459 , -10
  801.      MOV #168   ,-9
  802.      MOV -12,    <-12
  803.      MOV -13 ,   <-13
  804.      MOV -14  ,  <-14
  805. ; 
  806.      DJN -3    , -13
  807.      JMP -6
  808.      DAT 5544
  809.      DAT 5293
  810.      DAT 123
  811.      SPL 0
  812.      SPL 17
  813.      CMP <-5    ,<-4
  814.      MOV -3,     @-6
  815.      CMP <-7,    <-6
  816.      MOV -5  ,   @-7
  817.      DJN -4   ,  -7
  818.      MOV #5545 , -10
  819.      MOV #168   ,-9
  820.      MOV -12,    <-12
  821.      MOV -13 ,   <-13
  822.      MOV -14  ,  <-14
  823.      DJN -3    , -13
  824.      JMP -6
  825.      DAT 5630
  826.      DAT 5379
  827.      DAT 123
  828.      SPL 0
  829.      SPL 17
  830.      CMP <-5    ,<-4
  831.      MOV -3,     @-6
  832.      CMP <-7,    <-6
  833.      MOV -5  ,   @-7
  834.      DJN -4   ,  -7
  835.      MOV #5631 , -10
  836.      MOV #168   ,-9
  837.      MOV -12,    <-12
  838.      MOV -13 ,   <-13
  839.      MOV -14  ,  <-14
  840.      DJN -3    , -13
  841.      JMP -6
  842.      DAT 5716
  843.      DAT 5465
  844.      DAT 123
  845.      SPL 0
  846.      SPL 17
  847.      CMP <-5,    <-4
  848.      MOV -3  ,   @-6
  849.      CMP <-7  ,  <-6
  850.      MOV -5    , @-7
  851.      DJN -4,     -7
  852.      MOV #5717,  -10
  853.      MOV #168,   -9
  854.      MOV -12,    <-12
  855.      MOV -13,    <-13
  856.      MOV -14,    <-14
  857.      DJN -3,     -13
  858. ; 
  859.      JMP -6
  860.      DAT 5802
  861.      DAT 5551
  862.      DAT 123
  863.      SPL 0
  864.      SPL 17
  865.      CMP <-5,    <-4
  866.      MOV -3 ,    @-6
  867.      CMP <-7 ,   <-6
  868.      MOV -5   ,  @-7
  869.      DJN -4    , -7
  870.      MOV #5803  ,-10
  871.      MOV #168,   -9
  872.      MOV -12  ,  <-12
  873.      MOV -13   , <-13
  874. ; 
  875.      MOV -14    ,<-14
  876.      DJN -3,     -13
  877.      JMP -6
  878.      DAT 5888
  879.      DAT 5637
  880.      DAT 123
  881.      SPL 0
  882.      SPL 17
  883.      CMP <-5,    <-4
  884.      MOV -3  ,   @-6
  885.      CMP <-7  ,  <-6
  886.      MOV -5    , @-7
  887.      DJN -4     ,-7
  888.      MOV #5889,  -10
  889.      MOV #168  , -9
  890.      MOV -12    ,<-12
  891.      MOV -13,    <-13
  892.      MOV -14 ,   <-14
  893.      DJN -3   ,  -13
  894.      JMP -6
  895.      DAT 5974
  896.      DAT 5723
  897.      DAT 123
  898.      SPL 0
  899.      SPL 17
  900.      CMP <-5   , <-4
  901.      MOV -3     ,@-6
  902.      CMP <-7 ,   <-6
  903.      MOV -5   ,  @-7
  904.      DJN -4    , -7
  905.      MOV #5975 , -10
  906.      MOV #168,   -9
  907.      MOV -12  ,  <-12
  908.      MOV -13   , <-13
  909.      MOV -14    ,<-14
  910.      DJN -3,     -13
  911.      JMP -6
  912. ; 
  913.      DAT 6060
  914.      DAT 5809
  915.      DAT 123
  916.      SPL 0
  917.      SPL 17
  918.      CMP <-5,    <-4
  919.      MOV -3  ,   @-6
  920.      CMP <-7  ,  <-6
  921.      MOV -5    , @-7
  922.      DJN -4     ,-7
  923.      MOV #6061,  -10
  924.      MOV #168  , -9
  925.      MOV -12    ,<-12
  926.      MOV -13,    <-13
  927.      MOV -14 ,   <-14
  928.      DJN -3   ,  -13
  929.      JMP -6
  930.      DAT 6146
  931.      DAT 5895
  932.      DAT 123
  933.      SPL 0
  934.      SPL 17
  935.      CMP <-5   , <-4
  936.      MOV -3     ,@-6
  937.      CMP <-7,    <-6
  938.      MOV -5  ,   @-7
  939.      DJN -4   ,  -7
  940.      MOV #6147 , -10
  941.      MOV #168   ,-9
  942.      MOV -12,    <-12
  943.      MOV -13 ,   <-13
  944.      MOV -14  ,  <-14
  945.      DJN -3    , -13
  946.      JMP -6
  947.      DAT 6232
  948.      DAT 5981
  949.      DAT 123
  950.      SPL 0
  951.      SPL 17
  952.      CMP <-5    ,<-4
  953.      MOV -3,     @-6
  954.      CMP <-7,    <-6
  955.      MOV -5  ,   @-7
  956.      DJN -4   ,  -7
  957.      MOV #6233 , -10
  958.      MOV #168   ,-9
  959.      MOV -12,    <-12
  960.      MOV -13 ,   <-13
  961. ; 
  962.      MOV -14 ,   <-14
  963.      DJN -3   ,  -13
  964.      JMP -6
  965.      DAT 6318
  966. ;
  967.      DAT 6067
  968.      DAT 123
  969.      SPL 0
  970.      SPL 17
  971.      CMP <-5   , <-4
  972.      MOV -3     ,@-6
  973.      CMP <-7,    <-6
  974.      MOV -5  ,   @-7
  975.      DJN -4   ,  -7
  976.      MOV #6319 , -10
  977.      MOV #168   ,-9
  978.      MOV -12,    <-12
  979.      MOV -13 ,   <-13
  980.      MOV -14  ,  <-14
  981.      DJN -3    , -13
  982.      JMP -6
  983.      DAT 6404
  984.      DAT 6153
  985.      DAT 123
  986.      SPL 0
  987.      SPL 17
  988.      CMP <-5    ,<-4
  989.      MOV -3,     @-6
  990.      CMP <-7,    <-6
  991.      MOV -5  ,   @-7
  992.      DJN -4   ,  -7
  993.      MOV #6405 , -10
  994.      MOV #168   ,-9
  995.      MOV -12,    <-12
  996.      MOV -13 ,   <-13
  997.      MOV -14  ,  <-14
  998.      DJN -3    , -13
  999.      JMP -6
  1000.      DAT 6490
  1001.      DAT 6239
  1002.      DAT 123
  1003.      SPL 0
  1004.      SPL 17
  1005.      CMP <-5,    <-4
  1006.      MOV -3  ,   @-6
  1007.      CMP <-7  ,  <-6
  1008.      MOV -5    , @-7
  1009.      DJN -4     ,-7
  1010.      MOV #6491,  -10
  1011.      MOV #168,   -9
  1012.      MOV -12,    <-12
  1013.      MOV -13,    <-13
  1014.      MOV -14,    <-14
  1015.      DJN -3,     -13
  1016.      JMP -6
  1017.      DAT 6576
  1018.      DAT 6325
  1019. ; 
  1020.      DAT 123
  1021.      SPL 0
  1022.      SPL 17
  1023.      CMP <-5,    <-4
  1024.      MOV -3,     @-6
  1025.      CMP <-7,    <-6
  1026.      MOV -5,     @-7
  1027.      DJN -4,     -7
  1028.      MOV #6577,  -10
  1029.      MOV #168,   -9
  1030.      MOV -12,    <-12
  1031.      MOV -13,    <-13
  1032.      MOV -14,    <-14
  1033.      DJN -3,     -13
  1034.      JMP -6
  1035.      DAT 6662
  1036.      DAT 6411
  1037.      DAT 123
  1038. ; 
  1039.      SPL 0
  1040.      SPL 17
  1041.      CMP <-5,    <-4
  1042.      MOV -3,     @-6
  1043.      CMP <-7,    <-6
  1044.      MOV -5,     @-7
  1045.      DJN -4,     -7
  1046.      MOV #6663,  -10
  1047.      MOV #168,   -9
  1048.      MOV -12,    <-12
  1049.      MOV -13,    <-13
  1050.      MOV -14,    <-14
  1051.      DJN -3,     -13
  1052.      JMP -6
  1053.      DAT 6748
  1054.      DAT 6497
  1055.      DAT 123
  1056.      SPL 0
  1057.      SPL 17
  1058.      CMP <-5,    <-4
  1059.      MOV -3,     @-6
  1060.      CMP <-7,    <-6
  1061.      MOV -5,     @-7
  1062.      DJN -4,     -7
  1063.      MOV #6749,  -10
  1064.      MOV #168,   -9
  1065.      MOV -12,    <-12
  1066.      MOV -13,    <-13
  1067.      MOV -14,    <-14
  1068.      DJN -3,     -13
  1069.      JMP -6
  1070.      DAT 6834
  1071.      DAT 6583
  1072.      DAT 123
  1073. ; 
  1074.      SPL 0
  1075.      SPL 17
  1076.      CMP <-5,    <-4
  1077.      MOV -3,     @-6
  1078.      CMP <-7,    <-6
  1079.      MOV -5,     @-7
  1080.      DJN -4,     -7
  1081.      MOV #6835,  -10
  1082.      MOV #168,   -9
  1083.      MOV -12,    <-12
  1084.      MOV -13,    <-13
  1085.      MOV -14,    <-14
  1086. ; 
  1087.      DJN -3,     -13
  1088.      JMP -6
  1089.      DAT 6920
  1090.      DAT 6669
  1091.      DAT 123
  1092.      SPL 0
  1093.      SPL 17
  1094.      CMP <-5,    <-4
  1095. ; 
  1096.      MOV -3 ,    @-6
  1097.      CMP <-7 ,   <-6
  1098.      MOV -5   ,  @-7
  1099.      DJN -4    , -7
  1100.      MOV #6921  ,-10
  1101.      MOV #168,   -9
  1102.      MOV -12   , <-12
  1103.      MOV -13  ,  <-13
  1104.      MOV -14    ,<-14
  1105.      DJN -3,     -13
  1106.      JMP -6
  1107.      DAT 7006
  1108. ; 
  1109.      DAT 6755
  1110.      DAT 123
  1111.      SPL 0
  1112.      SPL 17
  1113.      CMP <-5,    <-4
  1114.      MOV -3  ,   @-6
  1115.      CMP <-7  ,  <-6
  1116.      MOV -5    , @-7
  1117.      DJN -4     ,-7
  1118.      MOV #7007  ,-10
  1119.      MOV #168   ,-9
  1120.      MOV -12    ,<-12
  1121.      MOV -13    ,<-13
  1122.      MOV -14    ,<-14
  1123.      DJN -3     ,-13
  1124.      JMP -6
  1125.      END  START
  1126.